home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / keyboard.swg / 0039_Klick on keypress.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-08-27  |  342 b   |  15 lines

  1. {
  2. PER-ERIC LARSSON
  3.  
  4. > How do you determine if a key is still held down after another is
  5. > pressed ? KeyPressed returns False after second key is pressed and first
  6. > key is still held down. ??
  7.  
  8. From the helpFile For KEEP :
  9. }
  10.  
  11. Procedure Keyclick; interrupt;
  12. begin
  13.   if Port[$60] < $80 then
  14.     { Only click when key is pressed }
  15.